home *** CD-ROM | disk | FTP | other *** search
/ Aminet 43 / Aminet 43 (2001)(GTI - Schatztruhe)[!][Jun 2001].iso / Aminet / comm / www / showurl.lha / showurl / Install next >
Text File  |  2001-03-23  |  829b  |  59 lines
  1. ; $VER: 38.0 ©Dietmar Eilert
  2.  
  3. (delopts "oknodelete" "force" "askuser")
  4.  
  5. (onerror
  6.  
  7.     (exit (quiet))
  8. )
  9.  
  10. (set app-name "showurl")
  11.  
  12. (if (= @installer-version 0)
  13.  
  14.     (set #esc "")
  15.     (set #esc "p")
  16. )
  17.  
  18. (if (not (exists "libs:remote.library"))
  19.  
  20.     (message "This will install the showurl program on your computer.\n\nNOTE: showurl needs the remote.library from the RA Remote Access package (available on Aminet servers).")
  21. )
  22.  
  23. (set @options
  24.  
  25.     (askoptions
  26.  
  27.         (prompt "Select components to install or update:")
  28.  
  29.         (help @askoptions-help)
  30.  
  31.         (default 15)
  32.  
  33.         (choices
  34.  
  35.             (cat #esc "Install showurl to c:")
  36.         )
  37.     )
  38. )
  39.  
  40. ; install binary
  41.  
  42. (if (IN @options 0)
  43.  
  44.     (
  45.         (copyfiles
  46.  
  47.             (source "c")
  48.  
  49.             (dest "c:")
  50.  
  51.             (all)
  52.         )
  53.     )
  54. )
  55.  
  56. (exit)
  57.  
  58. (welcome)
  59.